*** empty log message ***

diff --git a/lisp/term/x-win.el b/lisp/term/x-win.el
index c25b7402260bd08aff313f4151d1d39785954bff..f1708d9ccc680ce4befcd16258b910e5a5635243 100644 (file)
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -2126,6 +2126,9 @@ This is in addition to, but in preference to, the primary selection."
   (cond ((>= (length text) x-cut-buffer-max)
         (x-set-cut-buffer "" push)
         (setq x-last-selected-text-cut ""))
+       ;; Don't store a multibyte string that contains
+       ;; eight-bit-control/graphic chars because they can't be
+       ;; restored correctly by x-get-cut-buffer.
        ((and (multibyte-string-p text)
              (let ((charsets (find-charset-string text)))
                (or (memq 'eight-bit-control charsets)